home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / VISUAL_B / 2884A.ZIP / GETPUT.ZIP / GETPUTG.BAS < prev   
BASIC Source File  |  1991-08-13  |  795b  |  15 lines
  1. Declare Function BitBlt Lib "GDI" (ByVal hDestDC As Integer, ByVal X As Integer, ByVal Y As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer, ByVal hSrcDC As Integer, ByVal XSrc As Integer, ByVal YSrc As Integer, ByVal dwRop As Long) As Integer
  2. Global Const SRCCOPY = &HCC0020'pset
  3. 'other "put modes" (ternary raster ops) from DOS Basic:
  4. Global Const SRCPAINT = &HEE0086'or
  5. Global Const SRCAND = &H8800C6'and
  6. Global Const SRCINVERT = &H660046'xor
  7. 'There are other, more esoteric ones in Microsoft's WINAPI.TXT file
  8. 'It's a useful thing to have if you're into expanding VB
  9. 'Available in this forum (either in the VB Lib or the New Lib)
  10.  
  11. 'Comments or questions may be sent to:
  12. 'Wendell Martin [73737,1237]
  13. '(though I'm just starting to delve into the API realm myself)...
  14.  
  15.